home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fritz: All Fritz
/
All Fritz.zip
/
All Fritz
/
FILES
/
PROGNG_C
/
CUG187.LZH
/
STRUPPER.C
< prev
next >
Wrap
C/C++ Source or Header
|
1986-02-26
|
905b
|
28 lines
/*@*****************************************************/
/*@ */
/*@ strupper - change all letters in a string to */
/*@ upper case. */
/*@ */
/*@ Usage: strupper(str); */
/*@ where str is a string. It is converted in */
/*@ place. */
/*@ */
/*@ Result: It returns the address of str. */
/*@ */
/*@ */
/*@*****************************************************/
strupper(str)
char *str;
{
char *save;
save = str;
while (*str) {
*str = toupper(*str);
str++;
}
return save;
}